 Loading |
|
Loading |
| VBScript |
| JavaScript |
| Powershell |
Search Options: List Keyboard Properties
|
||
|
' Description: Returns information about the keyboard connected to a computer.
On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_Keyboard") For Each objItem in colItems Wscript.Echo "Caption: " & objItem.Caption Wscript.Echo "Description: " & objItem.Description Wscript.Echo "Device ID: " & objItem.DeviceID Wscript.Echo "Is Locked: " & objItem.IsLocked Wscript.Echo "Layout: " & objItem.Layout Wscript.Echo "Name: " & objItem.Name Wscript.Echo "Number of Function Keys: " & objItem.NumberOfFunctionKeys Wscript.Echo "Password: " & objItem.Password Wscript.Echo "PNP Device ID: " & objItem.PNPDeviceID Next | ||
© 2008 - 2013 Boris Toll :: Scripts available: 6.481 :: :: scriptbox.toll.at :: :: powered by www.toll.at :: | ||
